      module ccsdsomod 
      implicit none 

!-----moioso----
      integer MOIOTMP(10,20),MOIOWDTMP(10,20),
     &      MOIONUML(10,20),MOIONUMR(10,20)
!listrec is to decide the position of the first word written in
!partial 
      integer rectmp(10,20)
C
      end module ccsdsomod
      
